home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 45 / PC Gamer IT CD 45 2-2.iso / FLEET / data1.cab / Doctrines_Files / AirEvadeMissile.txt < prev    next >
Text File  |  1999-07-22  |  1KB  |  68 lines
  1. TITLE AirEvadeMissile
  2.  
  3. RULE Randomize Zig
  4. IF INIT = 1 THEN
  5.     RULE Left or Right
  6.     IF EXPR {0,10} > 5 THEN
  7.         VAR_SET 3 135
  8.     ELSE
  9.         VAR_SET 3 -135
  10.     END
  11. END
  12.  
  13. RULE Avoid Missiles
  14. IF SILOS < 0 THEN
  15.     RULE Two Pt Five Miles
  16.     IF RNG < 2000 THEN
  17.         PRIORITY 255
  18.         MAX_SPD
  19.         VAR_SET 1 BRG
  20.         VAR_ADD 1 VAR3
  21.         SETCRS VAR1
  22.         RULE Chaff Flares Zig
  23.         IF TIMER6 = -1 THEN
  24.             RULE Alternate
  25.             IF VAR2 = 1 THEN
  26.                 COUNTERMEASURE IRFlare
  27.                 VAR_SET 2 -1
  28.             ELSE
  29.                 COUNTERMEASURE Chaff
  30.                 VAR_SET 2 1
  31.             END
  32.             SET_TIMER 6 {10,20}
  33. ;            DEBUG "CMs 2.5 nmi"
  34.         END
  35. ;        DEBUG "Emergency Zig"
  36.     ELSE
  37.         RULE Eight Miles
  38.         IF RNG < 8000 AND THEN
  39.             PRIORITY 255
  40.             STEER_AWAY
  41.             MAX_SPD
  42.             RULE Chaff Flares Zig
  43.             IF TIMER6 = -1 THEN
  44.                 RULE Alternate
  45.                 IF VAR2 = 1 THEN
  46.                     COUNTERMEASURE IRFlare
  47.                     VAR_SET 2 -1
  48.                 ELSE
  49.                     COUNTERMEASURE Chaff
  50.                     VAR_SET 2 1
  51.                 END
  52.                 SET_TIMER 6 {10,20}
  53. ;                DEBUG "CMs 8 nmi"
  54.             END
  55.         ELSE
  56.             RULE Ten Miles
  57.             IF RNG < 10000 THEN
  58.                 STEER_AWAY
  59.                 MAX_SPD
  60. ;                DEBUG "Emergency Evade Missile"
  61.             END
  62.         END
  63.     END
  64. END
  65.  
  66.  
  67.  
  68.